home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PsL Monthly 1993 December
/
PSL Monthly Shareware CD-ROM (December 1993).iso
/
prgmming
/
dos
/
pascal
/
shazam.exe
/
ADEMO9.VIR
< prev
next >
Wrap
Text File
|
1992-09-01
|
866b
|
24 lines
{===================================================================
Activate BUFFERS unit for heap memory management
===================================================================}
procedure TGenericApp.PreInit ;
begin
ReserveForData ( 32 * ( 1024 div 16 ) ) ;
InitBuffers ;
EDITORS.EditorDialog := EditorDialog ; { *.INC }
end ;
{===================================================================
===================================================================}
procedure TGenericApp.PostInit ;
begin
LoadDesktopFrom ( Names.DSK ) ;
end ;
{===================================================================
===================================================================}
procedure TGenericApp.PreDone ;
begin
SaveDesktopTo ( Names.DSK , 'Demo Desktop File' ) ;
end ;